Jsonrpc: fix default value of success-fn (bug#64919)

* lisp/jsonrpc.el (jsonrpc--async-request-1): Fix default value of
success-fn.

diff --git a/lisp/jsonrpc.el b/lisp/jsonrpc.el
index ccf0f9665748d626472835588a625290e47269ef..c8b287a7e94123fcb797c3ad50c32d986045c1b9 100644 (file)
--- a/lisp/jsonrpc.el
+++ b/lisp/jsonrpc.el
@@ -698,7 +698,7 @@ TIMEOUT is nil)."
                              :params params)
     (puthash id
              (list (or success-fn
-                       (jsonrpc-lambda (&rest _ignored)
+                       (lambda (&rest _ignored)
                          (jsonrpc--debug
                           connection (list :message "success ignored"
                                            :id id))))